use strict;
package EGR;

sub _initialize
{

}

sub new
{
    my $self = {}
    bless $self;
    $self->_initialize();
    return $self;
}


